package ChannelInfo;
use strict;
use ObjectInfo;
use vars qw /@ISA/;
@ISA = ("ObjectInfo");
#################################
##{
## 	'NAME' => 'SSI_HoSE',
##	'SYS_SEQ' => '1',
##	'CLASS_NAME' => 'ChannelInfo',
##	'START_TIME' => '1204710900',
##	'PROCESSING_TIME' => '4',
##	'STATUS' => 'FAILED',
##	'MESSAGE' => '' 
##}
#################################

sub new{
	my $class = shift;
	my $self = $class->SUPER::new();
	$self->{'CLASS_NAME'} = 'ChannelInfo';
	bless $self, $class;
	return $self;	
}

1;